home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / muirexx2.1 / demos / muirexxbuild / test / test2.rexx < prev   
OS/2 REXX Batch file  |  1996-07-10  |  807b  |  30 lines
  1. /* Application created by MUIBuild */
  2.  
  3. address TEST2
  4.  
  5. Numeric_Value  = 0x8042ae3a
  6. Gauge_Current  = 0x8042f0dd
  7. Gauge_Horiz  = 0x804232dd
  8. Weight  = 0x80421d1f
  9. Notify  = 0x8042c9cb
  10. EveryTime  = 0x49893131
  11. Set  = 0x8042549a
  12. TriggerValue  = 0x49893131
  13.  
  14. window COMMAND """quit""" PORT TEST2 TITLE """A Test"""
  15.  group FRAME HORIZ
  16.   space HORIZ
  17.   knob ID KNOB
  18.   meter ID METR LABEL """meter"""
  19.   space HORIZ
  20.  endgroup
  21.  group FRAME
  22.   slider COMMAND """gauge ID GAUG ATTRS 0x8042f0dd %s""" PORT TEST2 ATTRS Numeric_Value 50
  23.   gauge ID GAUG LABEL """Level %ld""" ATTRS Gauge_Current 50 Gauge_Horiz 1
  24.   object CLASS "Scale.mui"
  25.  endgroup
  26.  object CLASS "Busy.mcc" ATTRS Weight 0
  27.  poplist LABELS """entry 1,entry 2,entry 3"""
  28. endwindow
  29. method ID KNOB Notify Numeric_Value EveryTime @METR 3 Set Numeric_Value TriggerValue
  30.